home *** CD-ROM | disk | FTP | other *** search
/ Aminet 23 / Aminet 23 (1998)(GTI - Schatztruhe)[!][Feb 1998].iso / Aminet / dev / misc / gms_dev.lha / GMSDev / Source / Asm / Blitter / OBJ.Worm.s < prev    next >
Text File  |  1997-12-15  |  2KB  |  80 lines
  1. ;Object Data for the Worm demo
  2. ;-----------------------------
  3. ;This is a data-file which must be assembled with an asm compiler.  In future
  4. ;these files will be created with a GUI interface - you might have to wait a
  5. ;little while for this!
  6. ;
  7. ;Assemble file to "GMS:demos/data/OBJ.Worm".
  8.  
  9.     INCDIR    "INCLUDES:"
  10.     INCLUDE    "dpkernel/dpkernel.i"
  11.  
  12. TAGOBJ    MACRO
  13.     dc.l    TAGS
  14.     IFNC    '\2',''
  15.     dc.l    \2
  16.     ELSE
  17.     dc.l    .end
  18.     ENDC
  19.     dc.b    \1,0
  20.     even
  21.     ENDM
  22.  
  23.     SECTION    "ObjectData",DATA
  24.  
  25. Objects    dc.b    "OBJF"
  26.  
  27. Worm:    TAGOBJ    "Worm"
  28.     dc.l    TAGS_BOB,0
  29.     dc.l    BBA_GfxCoords,.frames
  30.     dc.l    BBA_Width,32
  31.     dc.l    BBA_Height,24
  32.     dc.l    BBA_XCoord,150
  33.     dc.l    BBA_YCoord,150
  34.     dc.l    BBA_ClipLX,32
  35.     dc.l    BBA_ClipTY,32
  36.     dc.l    BBA_ClipRX,320-32
  37.     dc.l    BBA_ClipBY,256-32
  38.     dc.l    BBA_Attrib,BBF_GENMASKS|BBF_CLIP|BBF_RESTORE
  39.     dc.l      BBA_SourceTags,ID_PICTURE
  40.     dc.l      PCA_Source,.file
  41.     dc.l        PCA_BitmapTags,0
  42.     dc.l        BMA_MemType,MEM_BLIT
  43.     dc.l        TAGEND,0
  44.     dc.l      TAGEND,0
  45.     dc.l    TAGEND
  46.  
  47. .frames    dc.w      0,000    ;X/Y Graphic
  48.     dc.w     32,000
  49.     dc.w     64,000
  50.     dc.w     96,000
  51.     dc.w    128,000
  52.     dc.w    160,000
  53.     dc.w    192,000
  54.     dc.w    224,000
  55.     dc.w    256,000
  56.     dc.w    288,000
  57.     dc.w      0,048
  58.     dc.w     32,048
  59.     dc.w     64,048
  60.     dc.l     -1
  61.  
  62. .file    FILENAME "GMS:demos/data/PIC.Rambo"
  63.  
  64. .end ;----------------------------------------------------------------------;
  65.  
  66. SNDRambo:
  67.     TAGOBJ    "SNDRambo"
  68.     dc.l    TAGS_SOUND,0
  69.     dc.l    SA_Octave,OCT_C2S
  70.     dc.l    SA_Volume,100
  71.     dc.l    SA_Source,.file
  72.     dc.l    SA_Attrib,SSTOPLAST
  73.     dc.l    TAGEND
  74.  
  75. .file    FILENAME "GMS:demos/data/SND.Rambo"
  76.  
  77. .end ;----------------------------------------------------------------------;
  78.  
  79.     dc.l    "OEND"
  80.